home *** CD-ROM | disk | FTP | other *** search
/ Usenet 1993 July / InfoMagic USENET CD-ROM July 1993.ISO / sources / misc / volume11 / starchart / part01 next >
Encoding:
Text File  |  1990-03-15  |  59.3 KB  |  1,944 lines
  1. Newsgroups: comp.sources.misc
  2. subject: v11i029: starchart 3.2 Part 01/32
  3. from: ccount@ATHENA.MIT.EDU
  4. Sender: allbery@uunet.UU.NET (Brandon S. Allbery - comp.sources.misc)
  5.  
  6. Posting-number: Volume 11, Issue 29
  7. Submitted-by: ccount@ATHENA.MIT.EDU
  8. Archive-name: starchart/part01
  9.  
  10. This is release 3  of starchart, actually  now starchart/observe, plus
  11. supporting  programs and data  files.  Starchart produces astronomical
  12. charts from  a variety of databases,  producing output  for,  in rough
  13. order  of quality, PostScript,  X11, Sunview, Atari  ST, IBM  PC, X10,
  14. tektronix, unix plot, HP laserjet, and  tty displays, on Unix, vms and
  15. other systems.   It is straightforward   to  write drivers  for  other
  16. output devices.   Observe is    a  multifunction program for   use  in
  17. planning an observing session.  It calculates the positions of planets
  18. and their  satellites,  asteroids and  comets,  calculates rising  and
  19. setting  times, and much more.  Observe  complements the Ephem program
  20. previously posted in comp.sources.misc.
  21.  
  22. This version of starchart is compatible with earlier versions written
  23. by awpaeth.
  24.  
  25. Databases for starchart  were posted  to comp.sources.unix:   volume12
  26. contains the previous version including  a version  of the yale bright
  27. star  catalog, and volume16  contains a  version  of the  SAO catalog.
  28. This  version supports the Hubble  Space  Telescope Guide Star Catalog
  29. version 1.0.   A nebula database is available  and may be submitted in
  30. the future.  Archive sites for databases are  much desired, contact me
  31. as ccount@athena.mit.edu to arrange things.
  32.  
  33. #! /bin/sh
  34. # This is a shell archive.  Remove anything before this line, then unpack
  35. # it by saving it into a file and typing "sh file".  To overwrite existing
  36. # files, type "sh file -c".  You can also feed this as standard input via
  37. # unshar, or by typing "sh <file", e.g..  If this archive is complete, you
  38. # will see the following message at the end:
  39. #        "End of archive 1 (of 32)."
  40. # Contents:  MANIFEST Readme data data/README dataconv
  41. #   dataconv/Dataconv.MSC dataconv/README doc doc/astroinfo.el
  42. #   doc/dataconv.1 doc/sif_to_text.1 doc/starX11.1 doc/staribm.1
  43. #   doc/tosize.1 observe observe/Astring.h observe/Observe.MSC
  44. #   observe/date.h observe/degree.h samples samples/1989c1.par_e
  45. #   samples/README samples/area.rc samples/area.star samples/area2.rc
  46. #   samples/area2.star samples/area3.star samples/cer.aa
  47. #   samples/cer.emp samples/cer.empb samples/cobj.rc samples/cobj.star
  48. #   samples/color.rc samples/colorize.c samples/colorsif.awk
  49. #   samples/colorsif.perl samples/colorstar.awk samples/colorstar.perl
  50. #   samples/comet.par_e samples/gnomonic.rc samples/moon.rc
  51. #   samples/moon.star samples/obj.rc samples/obj.star
  52. #   samples/sampl.iau samples/sampl.st samples/sample.rc
  53. #   samples/size.rc samples/size.star samples/test.rc starchart
  54. #   starchart/README starchart/decwxtk.opt starchart/patchlevel.h
  55. #   starchart/pcstar.h starchart/postconv.awk starchart/starXaw.h
  56. #   starchart/starchart_init.com starchart/startool.sh
  57. #   starchart/vaxcrtl.opt starchart/vqgdos.s starchart/vqgdos.txt
  58. PATH=/bin:/usr/bin:/usr/ucb ; export PATH
  59. if test -f 'MANIFEST' -a "${1}" != "-c" ; then 
  60.   echo shar: Will not clobber existing file \"'MANIFEST'\"
  61. else
  62. echo shar: Extracting \"'MANIFEST'\" \(4736 characters\)
  63. sed "s/^X//" >'MANIFEST' <<'END_OF_FILE'
  64. X   File Name        Archive #    Description
  65. X-----------------------------------------------------------
  66. X MANIFEST                   1    This shipping list
  67. X Readme                     1    
  68. X Readme.second              2    
  69. X data                       1    
  70. X data/README                1    
  71. X data/boundaries.star       9    
  72. X data/cnames.star           2    
  73. X data/con.locs              3    
  74. X data/index.indx            3    
  75. X data/pattern.star          9    
  76. X data/reg_to_indx.perl      3    
  77. X dataconv                   1    
  78. X dataconv/Dataconv.MSC      1    
  79. X dataconv/Makefile          2    
  80. X dataconv/README            1    
  81. X dataconv/dataconv.c       25    
  82. X dataconv/sif_to_text.c    11    
  83. X dataconv/tosize.c          2    
  84. X dataconv/tosize.perl       2    
  85. X doc                        1    
  86. X doc/README                 2    
  87. X doc/as.ms.aa              24    
  88. X doc/as.ms.ab              22    
  89. X doc/as.texi.aa            31    
  90. X doc/as.texi.ab            30    
  91. X doc/astroinfo.el           1    
  92. X doc/dataconv.1             1    
  93. X doc/observe.1              5    
  94. X doc/sif_to_text.1          1    
  95. X doc/starX11.1              1    
  96. X doc/starchart.1            8    
  97. X doc/staribm.1              1    
  98. X doc/starpost.1             3    
  99. X doc/tosize.1               1    
  100. X observe                    1    
  101. X observe/Astring.h          1    
  102. X observe/Makefile           2    
  103. X observe/Observe.MSC        1    
  104. X observe/README             4    
  105. X observe/astlib.c           4    
  106. X observe/date.h             1    
  107. X observe/datelib.c          5    
  108. X observe/degree.h           1    
  109. X observe/descrip.mms        2    
  110. X observe/eventcalc.c        2    
  111. X observe/main.c            11    
  112. X observe/mooncalc.c         6    
  113. X observe/objcalc.c          3    
  114. X observe/observe.h          5    
  115. X observe/orbcalc.c          7    
  116. X observe/outaltaz.c         4    
  117. X observe/outeph.c           4    
  118. X observe/outobs.c           2    
  119. X observe/outsat.c          13    
  120. X observe/outsif.c           7    
  121. X observe/planetcalc.c      15    
  122. X observe/riseset.c          4    
  123. X observe/satcalc.c          5    
  124. X observe/sortlib.c          2    
  125. X observe/suncalc.c          3    
  126. X observe/tablecalc.c        7    
  127. X samples                    1    
  128. X samples/1989c1.par_e       1    
  129. X samples/README             1    
  130. X samples/area.rc            1    
  131. X samples/area.star          1    
  132. X samples/area2.rc           1    
  133. X samples/area2.star         1    
  134. X samples/area3.star         1    
  135. X samples/ast1990.ell_e      6    
  136. X samples/asteroids.ell_e    2    
  137. X samples/cer.aa             1    
  138. X samples/cer.emp            1    
  139. X samples/cer.empb           1    
  140. X samples/cobj.rc            1    
  141. X samples/cobj.star          1    
  142. X samples/color.rc           1    
  143. X samples/color.star         2    
  144. X samples/colorize.c         1    
  145. X samples/colorsif.awk       1    
  146. X samples/colorsif.perl      1    
  147. X samples/colorstar.awk      1    
  148. X samples/colorstar.perl     1    
  149. X samples/comet.par_e        1    
  150. X samples/gnomonic.rc        1    
  151. X samples/mess.obj           3    
  152. X samples/moon.rc            1    
  153. X samples/moon.star          1    
  154. X samples/obj.rc             1    
  155. X samples/obj.star           1    
  156. X samples/sampl.iau          1    
  157. X samples/sampl.st           1    
  158. X samples/sample.rc          1    
  159. X samples/size.rc            1    
  160. X samples/size.star          1    
  161. X samples/test.rc            1    
  162. X samples/test.star1-5       3    
  163. X samples/test.star6-A       2    
  164. X samples/test.starbright    2    
  165. X starchart                  1    
  166. X starchart/Makefile         6    
  167. X starchart/README           1    
  168. X starchart/README.mac       2    
  169. X starchart/README.st        3    
  170. X starchart/Starchar.MSC     2    
  171. X starchart/decwxtk.opt      1    
  172. X starchart/descrip.mms      7    
  173. X starchart/icon.h           3    
  174. X starchart/interact.c       5    
  175. X starchart/makefile.st      3    
  176. X starchart/parse_input.c    4    
  177. X starchart/parse_input.h    4    
  178. X starchart/patchlevel.h     1    
  179. X starchart/pcstar.h         1    
  180. X starchart/postconv.awk     1    
  181. X starchart/readfile.c      13    
  182. X starchart/sXawD.c.aa      20    
  183. X starchart/sXawD.c.ab      21    
  184. X starchart/spo.c.aa        26    
  185. X starchart/spo.c.ab        16    
  186. X starchart/ssup.c.aa       19    
  187. X starchart/ssup.c.ab       18    
  188. X starchart/star3.h          4    
  189. X starchart/starX10.c       10    
  190. X starchart/starX11.c       29    
  191. X starchart/starXaw.c       17    
  192. X starchart/starXaw.h        1    
  193. X starchart/starXawDlog.h    3    
  194. X starchart/starXawHelp.c    8    
  195. X starchart/starXawMwin.c   32    
  196. X starchart/starchart_init.com  1    
  197. X starchart/starcust.c       5    
  198. X starchart/stardsp.c       10    
  199. X starchart/staribm.c        9    
  200. X starchart/starimages.c    28    
  201. X starchart/starlaser.c      8    
  202. X starchart/starm2.c        12    
  203. X starchart/starmain.c      23    
  204. X starchart/starsample.c    10    
  205. X starchart/starst.c        12    
  206. X starchart/starsunv.c      14    
  207. X starchart/startek.c        6    
  208. X starchart/startool.icon    2    
  209. X starchart/startool.sh      1    
  210. X starchart/startool.tt     27    
  211. X starchart/staruplot.c      6    
  212. X starchart/vaxcrtl.opt      1    
  213. X starchart/vqgdos.s         1    
  214. X starchart/vqgdos.txt       1    
  215. END_OF_FILE
  216. if test 4736 -ne `wc -c <'MANIFEST'`; then
  217.     echo shar: \"'MANIFEST'\" unpacked with wrong size!
  218. fi
  219. # end of 'MANIFEST'
  220. fi
  221. if test -f 'Readme' -a "${1}" != "-c" ; then 
  222.   echo shar: Will not clobber existing file \"'Readme'\"
  223. else
  224. echo shar: Extracting \"'Readme'\" \(1307 characters\)
  225. sed "s/^X//" >'Readme' <<'END_OF_FILE'
  226. XThis is release 3  of starchart, actually  now starchart/observe, plus
  227. Xsupporting  programs and data  files.  Starchart produces astronomical
  228. Xcharts from  a variety of databases,  producing output  for,  in rough
  229. Xorder  of quality, PostScript,  X11, Sunview, Atari  ST, IBM  PC, X10,
  230. Xtektronix, unix plot, HP laserjet, and  tty displays, on Unix, vms and
  231. Xother systems.   It is straightforward   to  write drivers  for  other
  232. Xoutput devices.   Observe is    a  multifunction program for   use  in
  233. Xplanning an observing session.  It calculates the positions of planets
  234. Xand their  satellites,  asteroids and  comets,  calculates rising  and
  235. Xsetting  times, and much more.  Observe  complements the Ephem program
  236. Xpreviously posted in comp.sources.misc.
  237. X
  238. XThis version of starchart is compatible with earlier versions written
  239. Xby awpaeth.
  240. X
  241. XDatabases for starchart  were posted  to comp.sources.unix:   volume12
  242. Xcontains the previous version including  a version  of the yale bright
  243. Xstar  catalog, and volume16  contains a  version  of the  SAO catalog.
  244. XThis  version supports the Hubble  Space  Telescope Guide Star Catalog
  245. Xversion 1.0.   A nebula database is available  and may be submitted in
  246. Xthe future.  Archive sites for databases are  much desired, contact me
  247. Xas ccount@athena.mit.edu to arrange things.
  248. X
  249. X
  250. X
  251. END_OF_FILE
  252. if test 1307 -ne `wc -c <'Readme'`; then
  253.     echo shar: \"'Readme'\" unpacked with wrong size!
  254. fi
  255. # end of 'Readme'
  256. fi
  257. if test ! -d 'data' ; then
  258.     echo shar: Creating directory \"'data'\"
  259.     mkdir 'data'
  260. fi
  261. if test -f 'data/README' -a "${1}" != "-c" ; then 
  262.   echo shar: Will not clobber existing file \"'data/README'\"
  263. else
  264. echo shar: Extracting \"'data/README'\" \(1169 characters\)
  265. sed "s/^X//" >'data/README' <<'END_OF_FILE'
  266. XThese are data files to accompany the starchart program.
  267. X
  268. Xboundaries.star        constellation boundaries
  269. Xcnames.star        constellation names
  270. Xcon.locs        constellation locations
  271. Xindex.indx        sample index file for SAO data (see below)
  272. Xpattern.star        constellation patterns
  273. Xreg_to_indx.perl    generate index file for GSC CD rom (see below)
  274. X
  275. XThe  *.star files are courtesy Dave  Van't  Hof.  The con.locs file is
  276. Xfrom Bob Tidd, modified by Dave.
  277. X
  278. XYou  will  also need a   bright star file,   typically  yale.star from
  279. Xcomp.sources.unix volume 12 (patches in volume 13),  and  optionally a
  280. Xlarger database, for example the converted SAO database available from
  281. Xcomp.sources.unix volume 16, or the GSC CD_ROM.
  282. X
  283. XIf you have  the GSC CD_ROM,  you should generate  an index.indx  file
  284. X(perhaps  name it    "gsc.indx"   and  alter   the starchart  Makefile
  285. Xaccordingly).   See  reg_to_indx.perl  for   details.  The    file  so
  286. Xgenerated is too large to include in this distribution.
  287. X
  288. XA nebula  database  file was  posted  to sci.astro  in   the past, and
  289. Xanother may be posted to a source group by mid-1990.
  290. X
  291. XSee sci.astro  or   the astronomy  mailing list  for   news of   other
  292. Xdatabases.
  293. X
  294. END_OF_FILE
  295. if test 1169 -ne `wc -c <'data/README'`; then
  296.     echo shar: \"'data/README'\" unpacked with wrong size!
  297. fi
  298. # end of 'data/README'
  299. fi
  300. if test ! -d 'dataconv' ; then
  301.     echo shar: Creating directory \"'dataconv'\"
  302.     mkdir 'dataconv'
  303. fi
  304. if test -f 'dataconv/Dataconv.MSC' -a "${1}" != "-c" ; then 
  305.   echo shar: Will not clobber existing file \"'dataconv/Dataconv.MSC'\"
  306. else
  307. echo shar: Extracting \"'dataconv/Dataconv.MSC'\" \(489 characters\)
  308. sed "s/^X//" >'dataconv/Dataconv.MSC' <<'END_OF_FILE'
  309. XSRCS=dataconv.c tosize.c sif_to_text.c
  310. XHDRS=
  311. XOBJS=dataconv.obj tosize.obj sif_to_text.obj
  312. XFILES=Makefile $(SRCS) $(HDRS)
  313. XTARGS=dataconv.exe tosize.exe sif_to_text.exe
  314. X
  315. XCFLAGS=
  316. XLDFLAGS=
  317. X
  318. X
  319. XDISTDIR=../../dist/dataconv
  320. X
  321. Xall: $(TARGS)
  322. X
  323. X
  324. Xdataconv.exe: dataconv.obj
  325. X    $(CC) $(CFLAGS) -o $@ dataconv.obj $(LDFLAGS)
  326. X
  327. Xtosize.exe: tosize.obj
  328. X    $(CC) $(CFLAGS) -o $@ tosize.obj $(LDFLAGS)
  329. X
  330. Xsif_to_text.exe: sif_to_text.obj
  331. X    $(CC) $(CFLAGS) -o $@ sif_to_text.obj $(LDFLAGS)
  332. X
  333. Xclean:
  334. X    rm -f *.obj $(TARGS)
  335. END_OF_FILE
  336. if test 489 -ne `wc -c <'dataconv/Dataconv.MSC'`; then
  337.     echo shar: \"'dataconv/Dataconv.MSC'\" unpacked with wrong size!
  338. fi
  339. # end of 'dataconv/Dataconv.MSC'
  340. fi
  341. if test -f 'dataconv/README' -a "${1}" != "-c" ; then 
  342.   echo shar: Will not clobber existing file \"'dataconv/README'\"
  343. else
  344. echo shar: Extracting \"'dataconv/README'\" \(49 characters\)
  345. sed "s/^X//" >'dataconv/README' <<'END_OF_FILE'
  346. X1) Dataconv.MSC is for Microsoft C on the IBMPC.
  347. END_OF_FILE
  348. if test 49 -ne `wc -c <'dataconv/README'`; then
  349.     echo shar: \"'dataconv/README'\" unpacked with wrong size!
  350. fi
  351. # end of 'dataconv/README'
  352. fi
  353. if test ! -d 'doc' ; then
  354.     echo shar: Creating directory \"'doc'\"
  355.     mkdir 'doc'
  356. fi
  357. if test -f 'doc/astroinfo.el' -a "${1}" != "-c" ; then 
  358.   echo shar: Will not clobber existing file \"'doc/astroinfo.el'\"
  359. else
  360. echo shar: Extracting \"'doc/astroinfo.el'\" \(139 characters\)
  361. sed "s/^X//" >'doc/astroinfo.el' <<'END_OF_FILE'
  362. X;; Start emacs using: "emacs -l astroinfo.el"
  363. X(load "info")
  364. X;; You may want to use an absolute path name here
  365. X(Info-goto-node "(./astro)")
  366. END_OF_FILE
  367. if test 139 -ne `wc -c <'doc/astroinfo.el'`; then
  368.     echo shar: \"'doc/astroinfo.el'\" unpacked with wrong size!
  369. fi
  370. # end of 'doc/astroinfo.el'
  371. fi
  372. if test -f 'doc/dataconv.1' -a "${1}" != "-c" ; then 
  373.   echo shar: Will not clobber existing file \"'doc/dataconv.1'\"
  374. else
  375. echo shar: Extracting \"'doc/dataconv.1'\" \(1328 characters\)
  376. sed "s/^X//" >'doc/dataconv.1' <<'END_OF_FILE'
  377. X.TH DATACONV LOCAL "15 July 1989"
  378. X.ad b
  379. X.SH NAME
  380. Xdataconv \- convert data between starchart formats, precessing if desired
  381. X.SH SYNOPSIS
  382. X.B dataconv
  383. X.BI \-i " inname intype"
  384. X.BI \-o " outname outtype"
  385. X[
  386. X.BI \-s c
  387. X]
  388. X.br
  389. X.if t .ti +.5i
  390. X[
  391. X.BI \-f " from_equinox"
  392. X.BI \-t " to_equinox"
  393. X]
  394. X
  395. X.SH DESCRIPTION
  396. X
  397. XConvert the file \fIinname\fR of file format \fIintype\fR to
  398. X\fIoutname\fR of file format \fIouttype\fR.  If either type is `sif',
  399. Xthe \fB-s\fIc\fR argument specifies a field separation character of
  400. X\fIc\fR.  The default separation character is ";".  The coordinates
  401. Xmay be precessed from \fIfrom_equinox\fR to \fIto_equinox\fR.
  402. X.PP
  403. X
  404. XThe file formats are:
  405. X.br
  406. Xlineread - yale.star format text format.
  407. X.br
  408. Xsif     - Starchart Interchange Format, simple text format.
  409. X.br
  410. Xbinfull     - Binary file format containing all the data in the above formats.
  411. X.br
  412. Xbinobj     - Binary file format containing only position, magnitude, and
  413. Xobject type.
  414. X.br
  415. Xbinstar     - Binary file format containing only position and magnitude,
  416. Xtype defaults to single star.
  417. X.br
  418. Xgsc     - Data file from the Guide Star Catalog.  This format can
  419. Xonly be read, not generated.
  420. X.PP
  421. X
  422. X.SH EXAMPLES
  423. Xdataconv -i yale.star lineread -o yale.binstar binfull
  424. X.br
  425. Xdataconv -i new-comet.sif sif -o new-comet binobj -s= -f 1989.0 -t 2000.0
  426. X.SH FILES
  427. X.SH BUGS
  428. X.SH AUTHOR
  429. XCraig Counterman
  430. END_OF_FILE
  431. if test 1328 -ne `wc -c <'doc/dataconv.1'`; then
  432.     echo shar: \"'doc/dataconv.1'\" unpacked with wrong size!
  433. fi
  434. # end of 'doc/dataconv.1'
  435. fi
  436. if test -f 'doc/sif_to_text.1' -a "${1}" != "-c" ; then 
  437.   echo shar: Will not clobber existing file \"'doc/sif_to_text.1'\"
  438. else
  439. echo shar: Extracting \"'doc/sif_to_text.1'\" \(636 characters\)
  440. sed "s/^X//" >'doc/sif_to_text.1' <<'END_OF_FILE'
  441. X.TH SIF_TO_TEXT LOCAL "15 July 1989"
  442. X.ad b
  443. X.SH NAME
  444. Xsif_to_text \- produce table of data contained in `sif' format
  445. Xstarchart data file
  446. X.SH SYNOPSIS
  447. X.B sif_to_text
  448. X[
  449. X.BI \-i " infile"
  450. X] [
  451. X.BI -s c
  452. X]
  453. X    
  454. X.SH DESCRIPTION
  455. X
  456. XThis program takes the data from the starchart `sif' format file
  457. X\fIinfile\fR, or the standard input if no file name is given, and
  458. Xsends the interpreted and formatted data to the standard output.
  459. X.PP
  460. X
  461. XThe \fB-s\fR\fIc\fR argument specifies the field separation character of
  462. Xthe input `sif' data.  The default separation character is ";".
  463. X
  464. X.PP
  465. X
  466. XSee also the \fIdataconv\fI program.
  467. X
  468. X.SH BUGS
  469. X.SH AUTHOR
  470. XCraig Counterman
  471. END_OF_FILE
  472. if test 636 -ne `wc -c <'doc/sif_to_text.1'`; then
  473.     echo shar: \"'doc/sif_to_text.1'\" unpacked with wrong size!
  474. fi
  475. # end of 'doc/sif_to_text.1'
  476. fi
  477. if test -f 'doc/starX11.1' -a "${1}" != "-c" ; then 
  478.   echo shar: Will not clobber existing file \"'doc/starX11.1'\"
  479. else
  480. echo shar: Extracting \"'doc/starX11.1'\" \(1318 characters\)
  481. sed "s/^X//" >'doc/starX11.1' <<'END_OF_FILE'
  482. X.TH STARCHART LOCAL "15 July 1989"
  483. X.ad b
  484. X.SH NAME
  485. XstarX11, starXaw, starXtk \- astronomical star charts for X11.
  486. X.SH SYNOPSIS
  487. XArguments as in other starchart programs, with the special argument -a:
  488. X.br
  489. X.B \-a
  490. X"\fBp\fR
  491. X|
  492. X.B l
  493. X|
  494. X.B h
  495. X|
  496. X.B b
  497. X|
  498. X.B m
  499. X|
  500. X.BI t " toolkit_args"
  501. X"
  502. X.br
  503. X
  504. X.SH DESCRIPTION
  505. XSee
  506. X.IR starchart(1)
  507. Xfor details on the starchart programs in general.
  508. X.PP
  509. XThe additional argument is:
  510. X\fBh\fR for hide: display is generated invisibly, which may save time.
  511. X.br
  512. X\fBp\fR for PostScript preview: use screen size and shape to
  513. Xapproximate coverage of ``starpost'' chart.
  514. X.br
  515. X\fBl\fR for PostScript landscape preview: use screen size and shape to
  516. Xapproximate coverage of ``starpost'' landscape format chart.
  517. X.br
  518. X\fBb\fR for backup: use backup pixmap, allows window to be hidden and redrawn.
  519. X.br
  520. X\fBm\fR for monochrome: prevents use of color on displays otherwise
  521. Xcapable of it.
  522. X.PP
  523. XstarXaw has the additional control:
  524. X.br
  525. X.BI t " toolkit_args"
  526. Xfor access to the standard X toolkit controls, such as for geometry,
  527. Xfonts, etc.
  528. X.SH EXAMPLES
  529. XstarX11 -c ori -g 5 -a p
  530. X.br
  531. XstarXaw -c sgr -a p -a "t -geometry -0-0 -bg red"
  532. X
  533. X.SH BUGS
  534. X.SH AUTHORS/EDITORS
  535. XCraig Counterman
  536. X.br
  537. XAlan Paeth, University of Waterloo <AWPaeth@watCGL>
  538. X.SH MAJOR CONTRIBUTORS
  539. XJoe Wang <joe@athena.mit.edu>
  540. X.br
  541. XSteve Kennedy <smk@cbosgd.att.com>
  542. X
  543. X
  544. END_OF_FILE
  545. if test 1318 -ne `wc -c <'doc/starX11.1'`; then
  546.     echo shar: \"'doc/starX11.1'\" unpacked with wrong size!
  547. fi
  548. # end of 'doc/starX11.1'
  549. fi
  550. if test -f 'doc/staribm.1' -a "${1}" != "-c" ; then 
  551.   echo shar: Will not clobber existing file \"'doc/staribm.1'\"
  552. else
  553. echo shar: Extracting \"'doc/staribm.1'\" \(917 characters\)
  554. sed "s/^X//" >'doc/staribm.1' <<'END_OF_FILE'
  555. X.TH STARCHART LOCAL "15 July 1989"
  556. X.ad b
  557. X.SH NAME
  558. Xstaribm \- display astronomical star charts on IBM PC.
  559. X.SH SYNOPSIS
  560. XArguments as in other starchart programs, with the special argument -a:
  561. X.br
  562. X.B \-a
  563. X[
  564. X.B VRES16COLOR
  565. X.B VRES2COLOR
  566. X.B ERESCOLOR
  567. X.B ERESNOCOLOR
  568. X.B HRES16COLOR
  569. X.B HRESBW
  570. X.B MRES16COLOR
  571. X.B MRES4COLOR
  572. X.B MRESNOCOLOR
  573. X]
  574. X.br
  575. X.SH DESCRIPTION
  576. XSee starchart(1) for details on the starchart programs in general.
  577. X.PP
  578. XThe
  579. X.B \-a
  580. Xoption allows the specification of a display mode to use. Normally
  581. Xthe driver picks the highest resolution display which will work, but
  582. Xif you specify a mode it will try to use that instead.
  583. X.SH BUGS
  584. XThe driver gets its font from the built in font in the BIOS ROM.
  585. XOn PCs which are not totally standard, the font may not be located
  586. Xat the same magic address, so characters will display as gibberish.
  587. X.SH AUTHORS/EDITORS
  588. XTom Horsley <tahorsley@ssd.csd.harris.com>
  589. X.br
  590. XCraig Counterman
  591. END_OF_FILE
  592. if test 917 -ne `wc -c <'doc/staribm.1'`; then
  593.     echo shar: \"'doc/staribm.1'\" unpacked with wrong size!
  594. fi
  595. # end of 'doc/staribm.1'
  596. fi
  597. if test -f 'doc/tosize.1' -a "${1}" != "-c" ; then 
  598.   echo shar: Will not clobber existing file \"'doc/tosize.1'\"
  599. else
  600. echo shar: Extracting \"'doc/tosize.1'\" \(1302 characters\)
  601. sed "s/^X//" >'doc/tosize.1' <<'END_OF_FILE'
  602. X.TH TOSIZE LOCAL "15 July 1989"
  603. X.ad b
  604. X.SH NAME
  605. Xtosize \- Encode size of object in two characters, as used in starchart data
  606. X.SH SYNOPSIS
  607. X.B tosize
  608. X[
  609. X.B \-
  610. X[
  611. X.B d
  612. X][
  613. X.B m
  614. X][
  615. X.B s
  616. X]]
  617. X.I size
  618. X[
  619. X.I size ...
  620. X]
  621. X    
  622. X.SH DESCRIPTION
  623. X
  624. XThe size field for non-stellar objects in the starchart databases
  625. Xcontains the size of the object in seconds of arc encoded to two
  626. Xsignificant figures as two characters, up to a diameter of 89000
  627. Xseconds, or 24.7 degrees, which is encoded as `Z9'.
  628. X
  629. X.PP
  630. X
  631. XThis program is intended to facilitate the encoding.  The sizes of
  632. Xseveral objects may be included in the command line, the encoded sizes
  633. Xare sent to the standard output.  The first argument may be used to
  634. Xcontrol the meaning of the succeding arguments.  A `d' means that the
  635. Xcorresponding argument is the size in degrees, a `m' represents
  636. Xminutes, and `s' represents seconds.  These may be combined up to
  637. Xthree letters.  That is, `-dm' means that the following arguments
  638. Xshould be taken in pairs, with the first being the degree component of
  639. Xthe size, and the second the minutes.
  640. X
  641. X.PP
  642. X
  643. XWhen the command line arguments have been exhausted, numbers are read
  644. Xfrom the standard input.
  645. X
  646. X
  647. X
  648. X.SH EXAMPLES 
  649. Xtosize 1 14 140 1400  14000 14000 89000 88000
  650. X.br
  651. Xtosize -dms 1 10 30 2 30 45
  652. X.SH FILES
  653. X.SH BUGS
  654. X.SH AUTHOR
  655. XCraig Counterman
  656. END_OF_FILE
  657. if test 1302 -ne `wc -c <'doc/tosize.1'`; then
  658.     echo shar: \"'doc/tosize.1'\" unpacked with wrong size!
  659. fi
  660. # end of 'doc/tosize.1'
  661. fi
  662. if test ! -d 'observe' ; then
  663.     echo shar: Creating directory \"'observe'\"
  664.     mkdir 'observe'
  665. fi
  666. if test -f 'observe/Astring.h' -a "${1}" != "-c" ; then 
  667.   echo shar: Will not clobber existing file \"'observe/Astring.h'\"
  668. else
  669. echo shar: Extracting \"'observe/Astring.h'\" \(306 characters\)
  670. sed "s/^X//" >'observe/Astring.h' <<'END_OF_FILE'
  671. X/* Selfmade strings.h which is not included in MWC */
  672. Xextern    char    *strcat();
  673. Xextern    char    *strncat();
  674. X
  675. Xextern    int    strcmp();
  676. Xextern    int    strncmp();
  677. X
  678. X#ifndef GEMDOS
  679. X#define streq    !strcmp
  680. X#endif
  681. X
  682. Xextern    char    *strcpy();
  683. Xextern    char    *strncpy();
  684. X
  685. Xextern    int    strlen();
  686. X
  687. Xextern char    *index();
  688. Xextern char    *rindex();
  689. END_OF_FILE
  690. if test 306 -ne `wc -c <'observe/Astring.h'`; then
  691.     echo shar: \"'observe/Astring.h'\" unpacked with wrong size!
  692. fi
  693. # end of 'observe/Astring.h'
  694. fi
  695. if test -f 'observe/Observe.MSC' -a "${1}" != "-c" ; then 
  696.   echo shar: Will not clobber existing file \"'observe/Observe.MSC'\"
  697. else
  698. echo shar: Extracting \"'observe/Observe.MSC'\" \(1134 characters\)
  699. sed "s/^X//" >'observe/Observe.MSC' <<'END_OF_FILE'
  700. XCC=qcl
  701. XSRCS= astlib.c datelib.c eventcalc.c main.c mooncalc.c objcalc.c \
  702. X    orbcalc.c outeph.c outaltaz.c outobs.c outsat.c outsif.c planetcalc.c \
  703. X    riseset.c satcalc.c sortlib.c suncalc.c tablecalc.c
  704. XHDRS= date.h degree.h observe.h
  705. XOBJS= astlib.obj datelib.obj eventcalc.obj main.obj mooncalc.obj objcalc.obj \
  706. X    orbcalc.obj outeph.obj outaltaz.obj outobs.obj outsat.obj outsif.obj \
  707. X    planetcalc.obj riseset.obj satcalc.obj sortlib.obj suncalc.obj \
  708. X    tablecalc.obj 
  709. X
  710. XTARGS=observe.exe
  711. X
  712. XCFLAGS=-DSYSV -DMAXOBJECTS=150 -Dindex=strchr -Gt16 -AL
  713. X
  714. Xall: observe.exe
  715. X
  716. X
  717. Xobserve.exe: $(OBJS)
  718. X    $(CC) $(CFLAGS) *.obj -Feobserve.exe -F 4000
  719. X
  720. Xclean:
  721. X    rm -f *.obj $(TARGS)
  722. X
  723. Xastlib.obj: degree.h
  724. Xdatelib.obj: date.h 
  725. Xeventcalc.obj: observe.h degree.h
  726. Xmain.obj: observe.h date.h
  727. Xmooncalc.obj: observe.h degree.h
  728. Xobjcalc.obj: observe.h degree.h
  729. Xorbcalc.obj: observe.h degree.h
  730. Xouteph.obj: observe.h
  731. Xoutaltaz.obj: observe.h
  732. Xoutobs.obj: observe.h
  733. Xoutsat.obj: observe.h
  734. Xoutsif.obj: observe.h
  735. Xplanetcalc.obj: observe.h degree.h
  736. Xriseset.obj: observe.h degree.h
  737. Xsatcalc.obj: observe.h degree.h
  738. Xsuncalc.obj: observe.h degree.h
  739. Xtablecalc.obj: observe.h date.h
  740. END_OF_FILE
  741. if test 1134 -ne `wc -c <'observe/Observe.MSC'`; then
  742.     echo shar: \"'observe/Observe.MSC'\" unpacked with wrong size!
  743. fi
  744. # end of 'observe/Observe.MSC'
  745. fi
  746. if test -f 'observe/date.h' -a "${1}" != "-c" ; then 
  747.   echo shar: Will not clobber existing file \"'observe/date.h'\"
  748. else
  749. echo shar: Extracting \"'observe/date.h'\" \(712 characters\)
  750. sed "s/^X//" >'observe/date.h' <<'END_OF_FILE'
  751. X/*
  752. X * date.h
  753. X * datelib fuction declarations
  754. X *
  755. X * Copyright (c) 1990 by Craig Counterman. All rights reserved.
  756. X *
  757. X * This software may be redistributed freely, not sold.
  758. X * This copyright notice and disclaimer of warranty must remain
  759. X *    unchanged. 
  760. X *
  761. X * No representation is made about the suitability of this
  762. X * software for any purpose.  It is provided "as is" without express or
  763. X * implied warranty, to the extent permitted by applicable law.
  764. X *
  765. X */
  766. X
  767. X/*
  768. X * $Header: date.h,v 1.5 90/02/19 17:21:58 ccount Exp $
  769. X */
  770. X
  771. X
  772. Xvoid cal_to_jd();
  773. Xvoid cal_to_str();
  774. Xvoid jd_to_cal();
  775. Xvoid jd_to_str();
  776. Xvoid str_to_jd();
  777. Xvoid str_to_cal();
  778. X
  779. Xint tr_mname();
  780. X
  781. X/* put here for VMS and pure-ANSI systems */
  782. Xdouble atof();
  783. END_OF_FILE
  784. if test 712 -ne `wc -c <'observe/date.h'`; then
  785.     echo shar: \"'observe/date.h'\" unpacked with wrong size!
  786. fi
  787. # end of 'observe/date.h'
  788. fi
  789. if test -f 'observe/degree.h' -a "${1}" != "-c" ; then 
  790.   echo shar: Will not clobber existing file \"'observe/degree.h'\"
  791. else
  792. echo shar: Extracting \"'observe/degree.h'\" \(896 characters\)
  793. sed "s/^X//" >'observe/degree.h' <<'END_OF_FILE'
  794. X/*
  795. X * degree.h
  796. X * functions to deal with trigonometry in degrees
  797. X *
  798. X * Copyright (c) 1990 by Craig Counterman. All rights reserved.
  799. X *
  800. X * This software may be redistributed freely, not sold.
  801. X * This copyright notice and disclaimer of warranty must remain
  802. X *    unchanged. 
  803. X *
  804. X * No representation is made about the suitability of this
  805. X * software for any purpose.  It is provided "as is" without express or
  806. X * implied warranty, to the extent permitted by applicable law.
  807. X *
  808. X */
  809. X/*
  810. X * $Header: degree.h,v 1.4 90/02/19 17:22:01 ccount Exp $
  811. X */
  812. X
  813. X
  814. X#define DEG_TO_RAD 0.01745329251994329600
  815. X#define RAD_TO_DEG 57.29577951308232
  816. X#define DSIN(x) (sin((x)*DEG_TO_RAD))
  817. X#define DCOS(x) (cos((x)*DEG_TO_RAD))
  818. X#define DTAN(x) (tan((x)*DEG_TO_RAD))
  819. X#define DASIN(x) (asin(x)*RAD_TO_DEG)
  820. X#define DACOS(x) (acos(x)*RAD_TO_DEG)
  821. X#define DATAN(x) (atan(x)*RAD_TO_DEG)
  822. X#define DATAN2(x,y) (atan2(x,y)*RAD_TO_DEG)
  823. END_OF_FILE
  824. if test 896 -ne `wc -c <'observe/degree.h'`; then
  825.     echo shar: \"'observe/degree.h'\" unpacked with wrong size!
  826. fi
  827. # end of 'observe/degree.h'
  828. fi
  829. if test ! -d 'samples' ; then
  830.     echo shar: Creating directory \"'samples'\"
  831.     mkdir 'samples'
  832. fi
  833. if test -f 'samples/1989c1.par_e' -a "${1}" != "-c" ; then 
  834.   echo shar: Will not clobber existing file \"'samples/1989c1.par_e'\"
  835. else
  836. echo shar: Extracting \"'samples/1989c1.par_e'\" \(235 characters\)
  837. sed "s/^X//" >'samples/1989c1.par_e' <<'END_OF_FILE'
  838. XFirst three lines are ignored
  839. Xq = a*(1-e) Omega=node omega=peri.  g,k: g + 5*log(Delta) + 2.5*kappa*log(r)
  840. XName i Omega omega q Epoch_date Equinox_year g kappa
  841. XAustin 58.9370003 75.3042984 61.5709 0.349428 Apr 9.9138 1990 1950.0 4.5 4
  842. END_OF_FILE
  843. if test 235 -ne `wc -c <'samples/1989c1.par_e'`; then
  844.     echo shar: \"'samples/1989c1.par_e'\" unpacked with wrong size!
  845. fi
  846. # end of 'samples/1989c1.par_e'
  847. fi
  848. if test -f 'samples/README' -a "${1}" != "-c" ; then 
  849.   echo shar: Will not clobber existing file \"'samples/README'\"
  850. else
  851. echo shar: Extracting \"'samples/README'\" \(688 characters\)
  852. sed "s/^X//" >'samples/README' <<'END_OF_FILE'
  853. XThe files here are example data formats, test files, and suggestions
  854. Xfor manipulating data:
  855. X
  856. XExample formats:
  857. Xast1990.ell_e
  858. Xasteroids.ell_e
  859. X1989c1.par_e
  860. Xcomet.par_e
  861. Xcer.aa
  862. Xcer.emp
  863. Xcer.empb
  864. Xsampl.iau
  865. Xsampl.st
  866. Xmess.obj
  867. Xsample.rc
  868. X
  869. X(Note, 1989c1 is Comet Austin)
  870. X
  871. X
  872. XTest files:
  873. X    Projections:
  874. X    gnomonic.rc
  875. X
  876. X    Areas:
  877. X    area.rc
  878. X    area.star
  879. X    area2.rc
  880. X    area2.star
  881. X    area3.star
  882. X
  883. X    Color:
  884. X    cobj.rc
  885. X    cobj.star
  886. X    color.rc
  887. X    color.star
  888. X
  889. X    Moon:
  890. X    moon.star
  891. X    moon.rc
  892. X
  893. X    Objects:
  894. X    obj.rc
  895. X    obj.star
  896. X
  897. X    Object size:
  898. X    size.star
  899. X    size.rc
  900. X
  901. X    General test:
  902. X    test.rc
  903. X    test.star1-5
  904. X    test.star6-A
  905. X    test.starbright
  906. X
  907. X
  908. XSuggestions:
  909. Xadd color to databases:
  910. X    colorize.c
  911. X    colorsif.awk
  912. X    colorsif.perl
  913. X    colorstar.awk
  914. X    colorstar.perl
  915. X
  916. END_OF_FILE
  917. if test 688 -ne `wc -c <'samples/README'`; then
  918.     echo shar: \"'samples/README'\" unpacked with wrong size!
  919. fi
  920. # end of 'samples/README'
  921. fi
  922. if test -f 'samples/area.rc' -a "${1}" != "-c" ; then 
  923.   echo shar: Will not clobber existing file \"'samples/area.rc'\"
  924. else
  925. echo shar: Extracting \"'samples/area.rc'\" \(230 characters\)
  926. sed "s/^X//" >'samples/area.rc' <<'END_OF_FILE'
  927. Xra = 0.15
  928. Xdec = 5
  929. Xscale = 15
  930. Xnamelim = 20
  931. Xgklim = 20
  932. Xmaglim = 20
  933. Xtitle = Area test
  934. Xstarfile /dev/null
  935. Xnebfile /dev/null
  936. Xindexfile /dev/null
  937. Xplanetfile /dev/null
  938. Xuserfile = area.star
  939. Xprojection_mode = sansons
  940. Xchart_type = fullpage
  941. END_OF_FILE
  942. if test 230 -ne `wc -c <'samples/area.rc'`; then
  943.     echo shar: \"'samples/area.rc'\" unpacked with wrong size!
  944. fi
  945. # end of 'samples/area.rc'
  946. fi
  947. if test -f 'samples/area.star' -a "${1}" != "-c" ; then 
  948.   echo shar: Will not clobber existing file \"'samples/area.star'\"
  949. else
  950. echo shar: Extracting \"'samples/area.star'\" \(483 characters\)
  951. sed "s/^X//" >'samples/area.star' <<'END_OF_FILE'
  952. X001000+0500000AMM2a CMAAreaStart
  953. X001000+1000000AAM2a CMAAreaAdd
  954. X001500+1000000AAM2a CMAAreaAdd
  955. X002500+0800000AAM2a CMAAreaAdd
  956. X001500+0500000AAM2a CMAAreaFill
  957. X001000+0500000AFM2a CMAArea
  958. X000000+0500000VMM2a CMALinestart
  959. X000500+0000000VSO2a CMALineend
  960. X002000+0000000IAN3a CMAColor Text
  961. X010000+8000000AMM2a CMAstart
  962. X050000+7600000AAM2a CMAmiddle
  963. X100000+8000000AAO2a CMAfar
  964. X010000+8000000AFO2a CMAend
  965. X010000+8000000VMM2a CMAstart
  966. X050000+7600000VSM2a CMAmiddle
  967. X100000+8000000VSM2a CMAend
  968. END_OF_FILE
  969. if test 483 -ne `wc -c <'samples/area.star'`; then
  970.     echo shar: \"'samples/area.star'\" unpacked with wrong size!
  971. fi
  972. # end of 'samples/area.star'
  973. fi
  974. if test -f 'samples/area2.rc' -a "${1}" != "-c" ; then 
  975.   echo shar: Will not clobber existing file \"'samples/area2.rc'\"
  976. else
  977. echo shar: Extracting \"'samples/area2.rc'\" \(236 characters\)
  978. sed "s/^X//" >'samples/area2.rc' <<'END_OF_FILE'
  979. Xra = 0
  980. Xdec = 90
  981. Xscale = 30
  982. Xnamelim = 20
  983. Xgklim = 20
  984. Xmaglim = 20
  985. Xtitle = Area test 2
  986. Xstarfile /dev/null
  987. Xnebfile /dev/null
  988. Xindexfile /dev/null
  989. Xplanetfile /dev/null
  990. Xuserfile = area.star
  991. Xprojection_mode = stereographic
  992. Xchart_type = fullpage
  993. END_OF_FILE
  994. if test 236 -ne `wc -c <'samples/area2.rc'`; then
  995.     echo shar: \"'samples/area2.rc'\" unpacked with wrong size!
  996. fi
  997. # end of 'samples/area2.rc'
  998. fi
  999. if test -f 'samples/area2.star' -a "${1}" != "-c" ; then 
  1000.   echo shar: Will not clobber existing file \"'samples/area2.star'\"
  1001. else
  1002. echo shar: Extracting \"'samples/area2.star'\" \(481 characters\)
  1003. sed "s/^X//" >'samples/area2.star' <<'END_OF_FILE'
  1004. X080000+2700000Am
  1005. X060000+4000000Aa
  1006. X050000+1200000Aa
  1007. X080000+2700000Af
  1008. X060000-4000000Vm
  1009. X080000-2700000VS
  1010. X050000-1200000VS
  1011. X060000-4000000VS
  1012. X160000+4000000AM
  1013. X180000+3500000AA
  1014. X160000+3000000AA
  1015. X180000+2700000AA
  1016. X173000+2300000AA
  1017. X180000+2000000AA
  1018. X160000+1500000AA
  1019. X153000+1200000AA
  1020. X160000+4000000AF
  1021. X010000+8000000AmM2a CMA
  1022. X050000+7600000AaM2a CMA
  1023. X100000+8000000AaO2a CMA
  1024. X010000+8000000AfO2a CMA
  1025. X010000+6000000VmM2a CMA
  1026. X050000+5600000VsM2a CMA
  1027. X100000+6000000VsM2a CMA
  1028. X010000+6000000VsM2a CMA
  1029. END_OF_FILE
  1030. if test 481 -ne `wc -c <'samples/area2.star'`; then
  1031.     echo shar: \"'samples/area2.star'\" unpacked with wrong size!
  1032. fi
  1033. # end of 'samples/area2.star'
  1034. fi
  1035. if test -f 'samples/area3.star' -a "${1}" != "-c" ; then 
  1036.   echo shar: Will not clobber existing file \"'samples/area3.star'\"
  1037. else
  1038. echo shar: Extracting \"'samples/area3.star'\" \(483 characters\)
  1039. sed "s/^X//" >'samples/area3.star' <<'END_OF_FILE'
  1040. X001000+0500000AmM2a CMAAreaStart
  1041. X001000+1000000AaM2a CMAareAadd
  1042. X001500+1000000AaM2a CMAareaAdd
  1043. X002500+0800000AaM2a CMAareaAdd
  1044. X001500+0500000AaM2a CMAareaFill
  1045. X001000+0500000AfM2a CMAArea
  1046. X000000+0500000VmM2a CMALinestart
  1047. X000500+0000000VsO2a CMALineend
  1048. X002000+0000000IAN3a CMAColor Text
  1049. X010000+8000000AmM2a CMAstart
  1050. X050000+7600000AaM2a CMAmiddle
  1051. X100000+8000000AaO2a CMAfar
  1052. X010000+8000000AfO2a CMAend
  1053. X010000+8000000VmM2a CMAstart
  1054. X050000+7600000VsM2a CMAmiddle
  1055. X100000+8000000VsM2a CMAend
  1056. END_OF_FILE
  1057. if test 483 -ne `wc -c <'samples/area3.star'`; then
  1058.     echo shar: \"'samples/area3.star'\" unpacked with wrong size!
  1059. fi
  1060. # end of 'samples/area3.star'
  1061. fi
  1062. if test -f 'samples/cer.aa' -a "${1}" != "-c" ; then 
  1063.   echo shar: Will not clobber existing file \"'samples/cer.aa'\"
  1064. else
  1065. echo shar: Extracting \"'samples/cer.aa'\" \(386 characters\)
  1066. sed "s/^X//" >'samples/cer.aa' <<'END_OF_FILE'
  1067. XFirst three lines are ignored (unless year is specified)
  1068. XCeres data
  1069. Xdate     RA          DEC       r    Ephemeris Transit
  1070. XOct.  1  23 54 52.1 -17 37 21 2.011 23 10.0
  1071. X      3  23 53 16.1 -17 42 32 2.019 23 00.5
  1072. X      5  23 51 42.2 -17 46 55 2.028 22 51.1
  1073. X      7  23 50 11.1 -17 50 30 2.038 22 41.8
  1074. X      9  23 48 42.9 -17 53 16 2.049 22 32.5
  1075. X     11  23 47 18.0 -17 55 13 2.061 22 23.2
  1076. END_OF_FILE
  1077. if test 386 -ne `wc -c <'samples/cer.aa'`; then
  1078.     echo shar: \"'samples/cer.aa'\" unpacked with wrong size!
  1079. fi
  1080. # end of 'samples/cer.aa'
  1081. fi
  1082. if test -f 'samples/cer.emp' -a "${1}" != "-c" ; then 
  1083.   echo shar: Will not clobber existing file \"'samples/cer.emp'\"
  1084. else
  1085. echo shar: Extracting \"'samples/cer.emp'\" \(284 characters\)
  1086. sed "s/^X//" >'samples/cer.emp' <<'END_OF_FILE'
  1087. XFirst three lines are ignored unless year is specified, as in:
  1088. Xyear = 1987
  1089. Xon any line.  This is Ceres data
  1090. XX      6  23 48.4 -18  5
  1091. X      16  23 41.5 -18 13
  1092. X      26  23 36.4 -18  0
  1093. XXI     5  23 33.4 -17 29
  1094. X      15  23 32.8  -16 42
  1095. X      25  23 34.4 -15 41
  1096. XXII    5  23 38.1 -14 29
  1097. END_OF_FILE
  1098. if test 284 -ne `wc -c <'samples/cer.emp'`; then
  1099.     echo shar: \"'samples/cer.emp'\" unpacked with wrong size!
  1100. fi
  1101. # end of 'samples/cer.emp'
  1102. fi
  1103. if test -f 'samples/cer.empb' -a "${1}" != "-c" ; then 
  1104.   echo shar: Will not clobber existing file \"'samples/cer.empb'\"
  1105. else
  1106. echo shar: Extracting \"'samples/cer.empb'\" \(464 characters\)
  1107. sed "s/^X//" >'samples/cer.empb' <<'END_OF_FILE'
  1108. XFirst three lines are ignored unless year is specified, as in:
  1109. Xyear = 1987
  1110. Xon any line.  This is Ceres data
  1111. XX      6  23 48.36 -18  5.5 2.958 2.033   7.8 8.8
  1112. X      16  23 41.45 -18 13.1 2.955 2.095   8.0 11.6
  1113. X      26  23 36.36 -18  0.3 2.951 2.179   8.2 14.2
  1114. XXI     5  23 33.43 -17 29.1 2.947 2.280   8.4 16.3
  1115. X      15  23 32.8  -16 41.7 2.942 2.396   8.4 17.9
  1116. X      25  23 34.42 -15 41.0 2.938 2.522   8.7 18.9
  1117. XXII    5  23 38.09 -14 29.4 2.933 2.653   8.8 19.5
  1118. END_OF_FILE
  1119. if test 464 -ne `wc -c <'samples/cer.empb'`; then
  1120.     echo shar: \"'samples/cer.empb'\" unpacked with wrong size!
  1121. fi
  1122. # end of 'samples/cer.empb'
  1123. fi
  1124. if test -f 'samples/cobj.rc' -a "${1}" != "-c" ; then 
  1125.   echo shar: Will not clobber existing file \"'samples/cobj.rc'\"
  1126. else
  1127. echo shar: Extracting \"'samples/cobj.rc'\" \(129 characters\)
  1128. sed "s/^X//" >'samples/cobj.rc' <<'END_OF_FILE'
  1129. Xra .20
  1130. Xdec 5
  1131. Xscale 12
  1132. Xmaglim 20
  1133. Xstarfile /dev/null
  1134. Xnebfile /dev/null
  1135. Xindexfile /dev/null
  1136. Xplanetfile /dev/null
  1137. Xuserfile cobj.star
  1138. END_OF_FILE
  1139. if test 129 -ne `wc -c <'samples/cobj.rc'`; then
  1140.     echo shar: \"'samples/cobj.rc'\" unpacked with wrong size!
  1141. fi
  1142. # end of 'samples/cobj.rc'
  1143. fi
  1144. if test -f 'samples/cobj.star' -a "${1}" != "-c" ; then 
  1145.   echo shar: Will not clobber existing file \"'samples/cobj.star'\"
  1146. else
  1147. echo shar: Extracting \"'samples/cobj.star'\" \(1222 characters\)
  1148. sed "s/^X//" >'samples/cobj.star' <<'END_OF_FILE'
  1149. X000000+0000100CGr0     CG
  1150. X000000+0100100COr3     CO
  1151. X000000+0200100CXr6     CX
  1152. X000000+0300100Gar9     Ga
  1153. X000000+0400100Gbb0     Gb
  1154. X000000+0500100Gcb3     Gc
  1155. X000000+0600100Gdb6     Gd
  1156. X000000+0700100GBb9     GB
  1157. X000000+0800100GSg0     GS
  1158. X000000+0900100GOg3     GO
  1159. X001000+0000100GQg6     GQ
  1160. X001000+0100100GIg9     GI
  1161. X001000+0200100GGy0     GG
  1162. X001000+0300100GEy3     GE
  1163. X001000+0400100GUy6     GU
  1164. X001000+0500100GXy9     GX
  1165. X001000+0600100NDp0     ND
  1166. X001000+0700100NPp3     NP
  1167. X001000+0800100NXp6     NX
  1168. X001000+0900100PMp9     PM
  1169. X002000+0000100PVc0     PV
  1170. X002000+0100100Pmc3     Pm
  1171. X002000+0200100PJc6     PJ
  1172. X002000+0300100Psc9     Ps
  1173. X002000+0400100PUw0     PU
  1174. X002000+0500100PNw3     PN
  1175. X002000+0600100PPw6     PP
  1176. X002000+0700100PAw9     PA
  1177. X002000+0800100PCo0     PC
  1178. X002000+0900100PSo3     PS
  1179. X003000+0000100PLo6     PL
  1180. X003000+0100100PXo9     PX
  1181. X003000+0200100SSr0     SS
  1182. X003000+0300100SDr3     SD
  1183. X003000+0400100SVr6     SV
  1184. X003000+0500100OXr9     OX
  1185. X003000+0600100UXb0     UX
  1186. X003000+0700100VMb3     VM
  1187. X003000+0800100VSb6     VS
  1188. X003000+0900100VDb9     VD
  1189. X004000+0000100VHg0     VH
  1190. X004000+0100100IXg3     IX
  1191. X004000+0200100#Xg6     #X
  1192. X004000+0300100AMg9     AM
  1193. X004000+0400100AAy0     AA
  1194. X004000+0500100AFy3     AF
  1195. X004000+0600100AXy6     AX
  1196. END_OF_FILE
  1197. if test 1222 -ne `wc -c <'samples/cobj.star'`; then
  1198.     echo shar: \"'samples/cobj.star'\" unpacked with wrong size!
  1199. fi
  1200. # end of 'samples/cobj.star'
  1201. fi
  1202. if test -f 'samples/color.rc' -a "${1}" != "-c" ; then 
  1203.   echo shar: Will not clobber existing file \"'samples/color.rc'\"
  1204. else
  1205. echo shar: Extracting \"'samples/color.rc'\" \(130 characters\)
  1206. sed "s/^X//" >'samples/color.rc' <<'END_OF_FILE'
  1207. Xra .20
  1208. Xdec 5
  1209. Xscale 12
  1210. Xmaglim 20
  1211. Xstarfile /dev/null
  1212. Xnebfile /dev/null
  1213. Xindexfile /dev/null
  1214. Xplanetfile /dev/null
  1215. Xuserfile color.star
  1216. END_OF_FILE
  1217. if test 130 -ne `wc -c <'samples/color.rc'`; then
  1218.     echo shar: \"'samples/color.rc'\" unpacked with wrong size!
  1219. fi
  1220. # end of 'samples/color.rc'
  1221. fi
  1222. if test -f 'samples/colorize.c' -a "${1}" != "-c" ; then 
  1223.   echo shar: Will not clobber existing file \"'samples/colorize.c'\"
  1224. else
  1225. echo shar: Extracting \"'samples/colorize.c'\" \(426 characters\)
  1226. sed "s/^X//" >'samples/colorize.c' <<'END_OF_FILE'
  1227. X/* To add colors to neb.star, consider the following short program */
  1228. X
  1229. X#include <stdio.h>
  1230. X
  1231. Xmain()
  1232. X{
  1233. X  char inbuf[100];
  1234. X
  1235. X  while (gets(inbuf, 100)) {
  1236. X    if (inbuf[14] == 'C') { /* Cluster */
  1237. X    inbuf[16] = 'y';
  1238. X    inbuf[17] = '9';
  1239. X    };
  1240. X    if (inbuf[14] == 'N') { /* Nebula */
  1241. X    inbuf[16] = 'g';
  1242. X    inbuf[17] = '9';
  1243. X    };
  1244. X    if (inbuf[14] == 'G') { /* Galaxy */
  1245. X    inbuf[16] = 'r';
  1246. X    inbuf[17] = '9';
  1247. X    };
  1248. X    puts(inbuf);
  1249. X  }
  1250. X}
  1251. X
  1252. END_OF_FILE
  1253. if test 426 -ne `wc -c <'samples/colorize.c'`; then
  1254.     echo shar: \"'samples/colorize.c'\" unpacked with wrong size!
  1255. fi
  1256. # end of 'samples/colorize.c'
  1257. fi
  1258. if test -f 'samples/colorsif.awk' -a "${1}" != "-c" ; then 
  1259.   echo shar: Will not clobber existing file \"'samples/colorsif.awk'\"
  1260. else
  1261. echo shar: Extracting \"'samples/colorsif.awk'\" \(109 characters\)
  1262. sed "s/^X//" >'samples/colorsif.awk' <<'END_OF_FILE'
  1263. XBEGIN {OFS = FS = ";"}
  1264. X($4 ~ /^C./) {$5 = "y9"}
  1265. X($4 ~ /^N./) {$5 = "g9"}
  1266. X($4 ~ /^G./) {$5 = "r9"}
  1267. X{print $0}
  1268. END_OF_FILE
  1269. if test 109 -ne `wc -c <'samples/colorsif.awk'`; then
  1270.     echo shar: \"'samples/colorsif.awk'\" unpacked with wrong size!
  1271. fi
  1272. # end of 'samples/colorsif.awk'
  1273. fi
  1274. if test -f 'samples/colorsif.perl' -a "${1}" != "-c" ; then 
  1275.   echo shar: Will not clobber existing file \"'samples/colorsif.perl'\"
  1276. else
  1277. echo shar: Extracting \"'samples/colorsif.perl'\" \(350 characters\)
  1278. sed "s/^X//" >'samples/colorsif.perl' <<'END_OF_FILE'
  1279. X$[ = 1;            # set array base to 1
  1280. X$, = $FS = ';';
  1281. X$\ = "\n";        # set output record separator
  1282. X
  1283. Xwhile (<>) {
  1284. X    chop;    # strip record separator
  1285. X    @Fld = split(/[;\n]/, $_, 999);
  1286. X    if (($Fld[4] =~ /^C./)) {
  1287. X    $Fld[5] = 'y9';
  1288. X    } elsif (($Fld[4] =~ /^N./)) {
  1289. X    $Fld[5] = 'g9';
  1290. X    } elsif (($Fld[4] =~ /^G./)) {
  1291. X    $Fld[5] = 'r9';
  1292. X    }
  1293. X    print @Fld;
  1294. X}
  1295. END_OF_FILE
  1296. if test 350 -ne `wc -c <'samples/colorsif.perl'`; then
  1297.     echo shar: \"'samples/colorsif.perl'\" unpacked with wrong size!
  1298. fi
  1299. # end of 'samples/colorsif.perl'
  1300. fi
  1301. if test -f 'samples/colorstar.awk' -a "${1}" != "-c" ; then 
  1302.   echo shar: Will not clobber existing file \"'samples/colorstar.awk'\"
  1303. else
  1304. echo shar: Extracting \"'samples/colorstar.awk'\" \(175 characters\)
  1305. sed "s/^X//" >'samples/colorstar.awk' <<'END_OF_FILE'
  1306. X{t = "  "}
  1307. X(substr($0,15,1) == "C") {t = "y9"}
  1308. X(substr($0,15,1) == "N") {t = "g9"}
  1309. X(substr($0,15,1) == "G") {t = "r9"}
  1310. X{printf "%s%s%s\n", substr($0,1,16), t, substr($0,19)}
  1311. X
  1312. END_OF_FILE
  1313. if test 175 -ne `wc -c <'samples/colorstar.awk'`; then
  1314.     echo shar: \"'samples/colorstar.awk'\" unpacked with wrong size!
  1315. fi
  1316. # end of 'samples/colorstar.awk'
  1317. fi
  1318. if test -f 'samples/colorstar.perl' -a "${1}" != "-c" ; then 
  1319.   echo shar: Will not clobber existing file \"'samples/colorstar.perl'\"
  1320. else
  1321. echo shar: Extracting \"'samples/colorstar.perl'\" \(393 characters\)
  1322. sed "s/^X//" >'samples/colorstar.perl' <<'END_OF_FILE'
  1323. X$[ = 1;            # set array base to 1
  1324. X$\ = "\n";        # set output record separator
  1325. X
  1326. Xwhile (<>) {
  1327. X    chop;    # strip record separator
  1328. X    if ((substr($_, 15, 1) eq 'C')) {
  1329. X    $t = 'y9';
  1330. X    } elsif ((substr($_, 15, 1) eq 'N')) {
  1331. X    $t = 'g9';
  1332. X    } elsif ((substr($_, 15, 1) eq 'G')) {
  1333. X    $t = 'r9';
  1334. X    } else {
  1335. X        $t = '  ';
  1336. X    }
  1337. X    printf "%s%s%s\n", substr($_, 1, 16), $t, substr($_, 19, 999999);
  1338. X}
  1339. END_OF_FILE
  1340. if test 393 -ne `wc -c <'samples/colorstar.perl'`; then
  1341.     echo shar: \"'samples/colorstar.perl'\" unpacked with wrong size!
  1342. fi
  1343. # end of 'samples/colorstar.perl'
  1344. fi
  1345. if test -f 'samples/comet.par_e' -a "${1}" != "-c" ; then 
  1346.   echo shar: Will not clobber existing file \"'samples/comet.par_e'\"
  1347. else
  1348. echo shar: Extracting \"'samples/comet.par_e'\" \(168 characters\)
  1349. sed "s/^X//" >'samples/comet.par_e' <<'END_OF_FILE'
  1350. XFirst three lines are ignored
  1351. Xq = a*(1-e)
  1352. XName i Omega omega q Epoch_date Equinox_year g kappa
  1353. XKohler 48.7196 181.8175 163.4799 0.990662 Nov 10.5659 1977 1950.0 6 4
  1354. X
  1355. X
  1356. X
  1357. END_OF_FILE
  1358. if test 168 -ne `wc -c <'samples/comet.par_e'`; then
  1359.     echo shar: \"'samples/comet.par_e'\" unpacked with wrong size!
  1360. fi
  1361. # end of 'samples/comet.par_e'
  1362. fi
  1363. if test -f 'samples/gnomonic.rc' -a "${1}" != "-c" ; then 
  1364.   echo shar: Will not clobber existing file \"'samples/gnomonic.rc'\"
  1365. else
  1366. echo shar: Extracting \"'samples/gnomonic.rc'\" \(172 characters\)
  1367. sed "s/^X//" >'samples/gnomonic.rc' <<'END_OF_FILE'
  1368. Xra = 6.4
  1369. Xdec = 15
  1370. Xscale = 70
  1371. Xnamelim = 2
  1372. Xgklim = 3
  1373. Xmaglim = 5.5
  1374. Xtitle = Sample Gnomonic plot
  1375. Xprojection_mode = gnomonic
  1376. Xchart_type = fullpage
  1377. Xinvert = false
  1378. Xgrid .4 10 0 0
  1379. END_OF_FILE
  1380. if test 172 -ne `wc -c <'samples/gnomonic.rc'`; then
  1381.     echo shar: \"'samples/gnomonic.rc'\" unpacked with wrong size!
  1382. fi
  1383. # end of 'samples/gnomonic.rc'
  1384. fi
  1385. if test -f 'samples/moon.rc' -a "${1}" != "-c" ; then 
  1386.   echo shar: Will not clobber existing file \"'samples/moon.rc'\"
  1387. else
  1388. echo shar: Extracting \"'samples/moon.rc'\" \(129 characters\)
  1389. sed "s/^X//" >'samples/moon.rc' <<'END_OF_FILE'
  1390. Xra .20
  1391. Xdec 5
  1392. Xscale 12
  1393. Xmaglim 20
  1394. Xstarfile /dev/null
  1395. Xnebfile /dev/null
  1396. Xindexfile /dev/null
  1397. Xplanetfile /dev/null
  1398. Xuserfile moon.star
  1399. END_OF_FILE
  1400. if test 129 -ne `wc -c <'samples/moon.rc'`; then
  1401.     echo shar: \"'samples/moon.rc'\" unpacked with wrong size!
  1402. fi
  1403. # end of 'samples/moon.rc'
  1404. fi
  1405. if test -f 'samples/moon.star' -a "${1}" != "-c" ; then 
  1406.   echo shar: Will not clobber existing file \"'samples/moon.star'\"
  1407. else
  1408. echo shar: Extracting \"'samples/moon.star'\" \(643 characters\)
  1409. sed "s/^X//" >'samples/moon.star' <<'END_OF_FILE'
  1410. X000000+0000100PL       0, 0 90
  1411. X000000+0100100PL       30, 30 80
  1412. X000000+0200100PL       90, 90 70
  1413. X000000+0300100PL       135, 135 60
  1414. X000000+0400100PL       180, 180 50
  1415. X000000+0500100PL       135, 135 270
  1416. X000000+0600100PL       90, 90 260
  1417. X000000+0700100PL       30, 30 250
  1418. X000000+0800100PL       0, 0 90
  1419. X000000+0900100PL       30, 30 60
  1420. X002000+0000100PC       0, 0
  1421. X002000+0100100PC       30, 30
  1422. X002000+0200100PC       90, 90
  1423. X002000+0300100PC       135, 135
  1424. X002000+0400100PC       180, 180
  1425. X002000+0500100PC       -135, -135
  1426. X002000+0600100PC       -90, -90
  1427. X002000+0700100PC       -30, -30
  1428. X002000+0800100PC       0, 0
  1429. X002000+0900100PC       30, 30
  1430. END_OF_FILE
  1431. if test 643 -ne `wc -c <'samples/moon.star'`; then
  1432.     echo shar: \"'samples/moon.star'\" unpacked with wrong size!
  1433. fi
  1434. # end of 'samples/moon.star'
  1435. fi
  1436. if test -f 'samples/obj.rc' -a "${1}" != "-c" ; then 
  1437.   echo shar: Will not clobber existing file \"'samples/obj.rc'\"
  1438. else
  1439. echo shar: Extracting \"'samples/obj.rc'\" \(128 characters\)
  1440. sed "s/^X//" >'samples/obj.rc' <<'END_OF_FILE'
  1441. Xra .20
  1442. Xdec 5
  1443. Xscale 12
  1444. Xmaglim 20
  1445. Xstarfile /dev/null
  1446. Xnebfile /dev/null
  1447. Xindexfile /dev/null
  1448. Xplanetfile /dev/null
  1449. Xuserfile obj.star
  1450. END_OF_FILE
  1451. if test 128 -ne `wc -c <'samples/obj.rc'`; then
  1452.     echo shar: \"'samples/obj.rc'\" unpacked with wrong size!
  1453. fi
  1454. # end of 'samples/obj.rc'
  1455. fi
  1456. if test -f 'samples/obj.star' -a "${1}" != "-c" ; then 
  1457.   echo shar: Will not clobber existing file \"'samples/obj.star'\"
  1458. else
  1459. echo shar: Extracting \"'samples/obj.star'\" \(1222 characters\)
  1460. sed "s/^X//" >'samples/obj.star' <<'END_OF_FILE'
  1461. X000000+0000100CG       CG
  1462. X000000+0100100CO       CO
  1463. X000000+0200100CX       CX
  1464. X000000+0300100Ga       Ga
  1465. X000000+0400100Gb       Gb
  1466. X000000+0500100Gc       Gc
  1467. X000000+0600100Gd       Gd
  1468. X000000+0700100GB       GB
  1469. X000000+0800100GS       GS
  1470. X000000+0900100GO       GO
  1471. X001000+0000100GQ       GQ
  1472. X001000+0100100GI       GI
  1473. X001000+0200100GG       GG
  1474. X001000+0300100GE       GE
  1475. X001000+0400100GU       GU
  1476. X001000+0500100GX       GX
  1477. X001000+0600100ND       ND
  1478. X001000+0700100NP       NP
  1479. X001000+0800100NX       NX
  1480. X001000+0900100PM       PM
  1481. X002000+0000100PV       PV
  1482. X002000+0100100Pm       Pm
  1483. X002000+0200100PJ       PJ
  1484. X002000+0300100Ps       Ps
  1485. X002000+0400100PU       PU
  1486. X002000+0500100PN       PN
  1487. X002000+0600100PP       PP
  1488. X002000+0700100PA       PA
  1489. X002000+0800100PC       PC
  1490. X002000+0900100PS       PS
  1491. X003000+0000100PL       PL
  1492. X003000+0100100PX       PX
  1493. X003000+0200100SS       SS
  1494. X003000+0300100SD       SD
  1495. X003000+0400100SV       SV
  1496. X003000+0500100OX       OX
  1497. X003000+0600100UX       UX
  1498. X003000+0700100VM       VM
  1499. X003000+0800100VS       VS
  1500. X003000+0900100VD       VD
  1501. X004000+0000100VH       VH
  1502. X004000+0100100IX       IX
  1503. X004000+0200100#X       #X
  1504. X004000+0300100AM       AM
  1505. X004000+0400100AA       AA
  1506. X004000+0500100AF       AF
  1507. X004000+0600100AX       AX
  1508. END_OF_FILE
  1509. if test 1222 -ne `wc -c <'samples/obj.star'`; then
  1510.     echo shar: \"'samples/obj.star'\" unpacked with wrong size!
  1511. fi
  1512. # end of 'samples/obj.star'
  1513. fi
  1514. if test -f 'samples/sampl.iau' -a "${1}" != "-c" ; then 
  1515.   echo shar: Will not clobber existing file \"'samples/sampl.iau'\"
  1516. else
  1517. echo shar: Extracting \"'samples/sampl.iau'\" \(294 characters\)
  1518. sed "s/^X//" >'samples/sampl.iau' <<'END_OF_FILE'
  1519. XFirst three lines are ignored unless year is specified
  1520. Xsample data
  1521. Xdate       RA          DEC      \Delta     r     (V or m1)
  1522. XOct.   6   14 50.24    3 41.0   1.204    0.643   12.5
  1523. X      11   15 29.62    2 48.8
  1524. X      16   16 04.01    1 54.1   1.339    0.889   14.1
  1525. X      21   16 33.96    1 02.5
  1526. END_OF_FILE
  1527. if test 294 -ne `wc -c <'samples/sampl.iau'`; then
  1528.     echo shar: \"'samples/sampl.iau'\" unpacked with wrong size!
  1529. fi
  1530. # end of 'samples/sampl.iau'
  1531. fi
  1532. if test -f 'samples/sampl.st' -a "${1}" != "-c" ; then 
  1533.   echo shar: Will not clobber existing file \"'samples/sampl.st'\"
  1534. else
  1535. echo shar: Extracting \"'samples/sampl.st'\" \(205 characters\)
  1536. sed "s/^X//" >'samples/sampl.st' <<'END_OF_FILE'
  1537. XFirst three lines are ignored, unless year is specified, as:
  1538. Xyear = 1989
  1539. XDate    RA       DEC   Elongation Mag.
  1540. XOct  1  14 07.6  4 06  25  5.4
  1541. X     6  14 52.3  3 28  32  6.5
  1542. X    11  15 24.3  3 00  42  7.5
  1543. END_OF_FILE
  1544. if test 205 -ne `wc -c <'samples/sampl.st'`; then
  1545.     echo shar: \"'samples/sampl.st'\" unpacked with wrong size!
  1546. fi
  1547. # end of 'samples/sampl.st'
  1548. fi
  1549. if test -f 'samples/sample.rc' -a "${1}" != "-c" ; then 
  1550.   echo shar: Will not clobber existing file \"'samples/sample.rc'\"
  1551. else
  1552. echo shar: Extracting \"'samples/sample.rc'\" \(807 characters\)
  1553. sed "s/^X//" >'samples/sample.rc' <<'END_OF_FILE'
  1554. Xra    =        22.30      # same as -r
  1555. Xdec            -5           # same as -d
  1556. Xscale            12          # same as -s
  1557. Xtitle            Sample title      # same as -t
  1558. Xnamelim            4.0          # same as -l
  1559. Xmaglim            20.0      # same as -m
  1560. Xgklim            6.5          # same as -g
  1561. Xprojection_mode        gnomonic      # set projection mode
  1562. X#                    may be "sansons", "stereographic"
  1563. X#                    "orthographic", or "gnomonic"
  1564. Xinvert            true      # same as -i if logical is nonzero or is TRUE
  1565. Xprecess_to          1950.0      # Precess to equinox and ecliptic of year.
  1566. Xchart_type        fullpage      # set chart type: "fullpage" or "threepart"
  1567. X#                    "threepart" is default: Large window,
  1568. X#                    thumbnail, and legend
  1569. X#                    "fullpage'' is same as -b flag
  1570. Xvrange            5.0 0.5      # same as -v
  1571. Xgrid            0.30 5.0
  1572. X#                    same as -x
  1573. Xuserfile        sample.star lineread      # same as -f
  1574. END_OF_FILE
  1575. if test 807 -ne `wc -c <'samples/sample.rc'`; then
  1576.     echo shar: \"'samples/sample.rc'\" unpacked with wrong size!
  1577. fi
  1578. # end of 'samples/sample.rc'
  1579. fi
  1580. if test -f 'samples/size.rc' -a "${1}" != "-c" ; then 
  1581.   echo shar: Will not clobber existing file \"'samples/size.rc'\"
  1582. else
  1583. echo shar: Extracting \"'samples/size.rc'\" \(129 characters\)
  1584. sed "s/^X//" >'samples/size.rc' <<'END_OF_FILE'
  1585. Xra .20
  1586. Xdec 5
  1587. Xscale 12
  1588. Xmaglim 20
  1589. Xstarfile /dev/null
  1590. Xnebfile /dev/null
  1591. Xindexfile /dev/null
  1592. Xplanetfile /dev/null
  1593. Xuserfile size.star
  1594. END_OF_FILE
  1595. if test 129 -ne `wc -c <'samples/size.rc'`; then
  1596.     echo shar: \"'samples/size.rc'\" unpacked with wrong size!
  1597. fi
  1598. # end of 'samples/size.rc'
  1599. fi
  1600. if test -f 'samples/size.star' -a "${1}" != "-c" ; then 
  1601.   echo shar: Will not clobber existing file \"'samples/size.star'\"
  1602. else
  1603. echo shar: Extracting \"'samples/size.star'\" \(1222 characters\)
  1604. sed "s/^X//" >'samples/size.star' <<'END_OF_FILE'
  1605. X000000+0000100CG  60   CG
  1606. X000000+0100100CO  J8   CO
  1607. X000000+0200100CX  L6   CX
  1608. X000000+0300100Ga  P2   Ga
  1609. X000000+0400100Gb  60   Gb
  1610. X000000+0500100Gc  J8   Gc
  1611. X000000+0600100Gd  L6   Gd
  1612. X000000+0700100GB  P2   GB
  1613. X000000+0800100GS  60   GS
  1614. X000000+0900100GO  J8   GO
  1615. X001000+0000100GQ  L6   GQ
  1616. X001000+0100100GI  P2   GI
  1617. X001000+0200100GG  60   GG
  1618. X001000+0300100GE  J8   GE
  1619. X001000+0400100GU  L6   GU
  1620. X001000+0500100GX  P2   GX
  1621. X001000+0600100ND  60   ND
  1622. X001000+0700100NP  J8   NP
  1623. X001000+0800100NX  L6   NX
  1624. X001000+0900100PM  P2   PM
  1625. X002000+0000100PV  60   PV
  1626. X002000+0100100Pm  J8   Pm
  1627. X002000+0200100PJ  L6   PJ
  1628. X002000+0300100Ps  P2   Ps
  1629. X002000+0400100PU  60   PU
  1630. X002000+0500100PN  J8   PN
  1631. X002000+0600100PP  L6   PP
  1632. X002000+0700100PA  P2   PA
  1633. X002000+0800100PC  60   PC
  1634. X002000+0900100PS  J8   PS
  1635. X003000+0000100PL  L6   PL
  1636. X003000+0100100PX  P2   PX
  1637. X003000+0200100SS       SS
  1638. X003000+0300100SD       SD
  1639. X003000+0400100SV       SV
  1640. X003000+0500100OX  60   OX
  1641. X003000+0600100UX  J8   UX
  1642. X003000+0700100VM  L6   VM
  1643. X003000+0800100VS  P2   VS
  1644. X003000+0900100VD  60   VD
  1645. X004000+0000100VH  J8   VH
  1646. X004000+0100100IX  L6   IX
  1647. X004000+0200100#X  P2   #X
  1648. X004000+0300100AM  60   AM
  1649. X004000+0400100AA  J8   AA
  1650. X004000+0500100AF  L6   AF
  1651. X004000+0600100AX  P2   AX
  1652. END_OF_FILE
  1653. if test 1222 -ne `wc -c <'samples/size.star'`; then
  1654.     echo shar: \"'samples/size.star'\" unpacked with wrong size!
  1655. fi
  1656. # end of 'samples/size.star'
  1657. fi
  1658. if test -f 'samples/test.rc' -a "${1}" != "-c" ; then 
  1659.   echo shar: Will not clobber existing file \"'samples/test.rc'\"
  1660. else
  1661. echo shar: Extracting \"'samples/test.rc'\" \(111 characters\)
  1662. sed "s/^X//" >'samples/test.rc' <<'END_OF_FILE'
  1663. Xra .20
  1664. Xdec 5
  1665. Xscale 12
  1666. Xmaglim 20
  1667. Xstarfile /dev/null
  1668. Xnebfile /dev/null
  1669. Xindexfile /dev/null
  1670. Xplanetfile /dev/null
  1671. X
  1672. END_OF_FILE
  1673. if test 111 -ne `wc -c <'samples/test.rc'`; then
  1674.     echo shar: \"'samples/test.rc'\" unpacked with wrong size!
  1675. fi
  1676. # end of 'samples/test.rc'
  1677. fi
  1678. if test ! -d 'starchart' ; then
  1679.     echo shar: Creating directory \"'starchart'\"
  1680.     mkdir 'starchart'
  1681. fi
  1682. if test -f 'starchart/README' -a "${1}" != "-c" ; then 
  1683.   echo shar: Will not clobber existing file \"'starchart/README'\"
  1684. else
  1685. echo shar: Extracting \"'starchart/README'\" \(1226 characters\)
  1686. sed "s/^X//" >'starchart/README' <<'END_OF_FILE'
  1687. XVMS) The files decwxtk.opt, descrip.mms, starchart_init.com, and
  1688. Xvaxcrtl.opt are for VMS.
  1689. X
  1690. XIBMPC) Starchar.MSC, pcstar.h, and staribm.c are for Microsoft C on the IBMPC.
  1691. X
  1692. XMac) See README.mac
  1693. X
  1694. XAtari) makefile.st starst.c vqgdos.txt and vqgdos.s are for the
  1695. XAtari ST.  See README.st.
  1696. X
  1697. XCopyright (c) 1990 by Craig Counterman. All rights reserved.
  1698. X
  1699. XThis software may be redistributed freely, not sold.
  1700. XThis copyright notice and disclaimer of warranty must remain
  1701. X   unchanged. 
  1702. X
  1703. XNo representation is made about  the suitability of  this software for
  1704. Xany  purpose.   It  is  provided "as  is"  without express or  implied
  1705. Xwarranty, to the extent permitted by applicable law.
  1706. X
  1707. XDISCLAIMER OF WARRANTY
  1708. X----------------------
  1709. XThe author  disclaims all warranties  with regard to  this software to
  1710. Xthe   extent  permitted  by applicable   law,  including all   implied
  1711. Xwarranties  of merchantability  and  fitness. In  no event shall   the
  1712. Xauthor be liable for any special, indirect or consequential damages or
  1713. Xany  damages whatsoever resulting from  loss of use, data or  profits,
  1714. Xwhether in an action of contract, negligence or other tortious action,
  1715. Xarising  out of  or in connection with the  use or performance of this
  1716. Xsoftware.
  1717. X
  1718. X
  1719. END_OF_FILE
  1720. if test 1226 -ne `wc -c <'starchart/README'`; then
  1721.     echo shar: \"'starchart/README'\" unpacked with wrong size!
  1722. fi
  1723. # end of 'starchart/README'
  1724. fi
  1725. if test -f 'starchart/decwxtk.opt' -a "${1}" != "-c" ; then 
  1726.   echo shar: Will not clobber existing file \"'starchart/decwxtk.opt'\"
  1727. else
  1728. echo shar: Extracting \"'starchart/decwxtk.opt'\" \(88 characters\)
  1729. sed "s/^X//" >'starchart/decwxtk.opt' <<'END_OF_FILE'
  1730. Xsys$share:decw$xlibshr/share,-
  1731. Xsys$share:decw$dwtlibshr/share,-
  1732. Xsys$share:vaxcrtl/share
  1733. END_OF_FILE
  1734. if test 88 -ne `wc -c <'starchart/decwxtk.opt'`; then
  1735.     echo shar: \"'starchart/decwxtk.opt'\" unpacked with wrong size!
  1736. fi
  1737. # end of 'starchart/decwxtk.opt'
  1738. fi
  1739. if test -f 'starchart/patchlevel.h' -a "${1}" != "-c" ; then 
  1740.   echo shar: Will not clobber existing file \"'starchart/patchlevel.h'\"
  1741. else
  1742. echo shar: Extracting \"'starchart/patchlevel.h'\" \(59 characters\)
  1743. sed "s/^X//" >'starchart/patchlevel.h' <<'END_OF_FILE'
  1744. X#define VERSION_STRING "3.2"
  1745. X#define PATCHLEVEL_STRING "0"
  1746. END_OF_FILE
  1747. if test 59 -ne `wc -c <'starchart/patchlevel.h'`; then
  1748.     echo shar: \"'starchart/patchlevel.h'\" unpacked with wrong size!
  1749. fi
  1750. # end of 'starchart/patchlevel.h'
  1751. fi
  1752. if test -f 'starchart/pcstar.h' -a "${1}" != "-c" ; then 
  1753.   echo shar: Will not clobber existing file \"'starchart/pcstar.h'\"
  1754. else
  1755. echo shar: Extracting \"'starchart/pcstar.h'\" \(58 characters\)
  1756. sed "s/^X//" >'starchart/pcstar.h' <<'END_OF_FILE'
  1757. X#define CONSTFILE "./cons.loc"
  1758. X#define RCFILE "./star.rc"
  1759. END_OF_FILE
  1760. if test 58 -ne `wc -c <'starchart/pcstar.h'`; then
  1761.     echo shar: \"'starchart/pcstar.h'\" unpacked with wrong size!
  1762. fi
  1763. # end of 'starchart/pcstar.h'
  1764. fi
  1765. if test -f 'starchart/postconv.awk' -a "${1}" != "-c" ; then 
  1766.   echo shar: Will not clobber existing file \"'starchart/postconv.awk'\"
  1767. else
  1768. echo shar: Extracting \"'starchart/postconv.awk'\" \(642 characters\)
  1769. sed "s/^X//" >'starchart/postconv.awk' <<'END_OF_FILE'
  1770. X# This awk program takes a "mapwin" file produced by starXaw or
  1771. X# starX11 and changes the variables width, height, x_offset, and y_offset
  1772. X# to match the scale of starpost.
  1773. X# the numbers 4, 36, and 72 in this file as distributed are constants
  1774. X# in starpost.  If starpost is changed, these numbers also must change
  1775. X#
  1776. X# This may be wrapped in a shell script, e.g.
  1777. X# awk -f /usr/local/lib/star/postconv.awk
  1778. X#
  1779. XBEGIN {FS="="}
  1780. X{if (($1 == "width") || ($1 == "height"))
  1781. X        {printf "%s=%.0f\n", $1, $2*4}
  1782. X    else if ($1 == "x_offset")
  1783. X        {printf "%s=%.0f\n", $1, $2*4+36}
  1784. X    else if ($1 == "y_offset")
  1785. X        {printf "%s=%.0f\n", $1, $2*4+72}
  1786. X    else {print $0}
  1787. X}
  1788. END_OF_FILE
  1789. if test 642 -ne `wc -c <'starchart/postconv.awk'`; then
  1790.     echo shar: \"'starchart/postconv.awk'\" unpacked with wrong size!
  1791. fi
  1792. # end of 'starchart/postconv.awk'
  1793. fi
  1794. if test -f 'starchart/starXaw.h' -a "${1}" != "-c" ; then 
  1795.   echo shar: Will not clobber existing file \"'starchart/starXaw.h'\"
  1796. else
  1797. echo shar: Extracting \"'starchart/starXaw.h'\" \(713 characters\)
  1798. sed "s/^X//" >'starchart/starXaw.h' <<'END_OF_FILE'
  1799. X/* Header for Athena widgets starchart */
  1800. X/*
  1801. X *
  1802. X * $Header: starXaw.h,v 1.5 90/02/19 17:58:08 ccount Exp $
  1803. X * 
  1804. X *
  1805. X * Copyright (c) 1990 by Craig Counterman. All rights reserved.
  1806. X *
  1807. X * This software may be redistributed freely, not sold.
  1808. X * This copyright notice and disclaimer of warranty must remain
  1809. X *    unchanged. 
  1810. X *
  1811. X * No representation is made about the suitability of this
  1812. X * software for any purpose.  It is provided "as is" without express or
  1813. X * implied warranty, to the extent permitted by applicable law.
  1814. X *
  1815. X */
  1816. X
  1817. Xtypedef struct {
  1818. X  char *blabel;
  1819. X  void (*func)();
  1820. X} Button_set;
  1821. X
  1822. X
  1823. X/* VMS linker is not case sensitive */
  1824. X#ifdef VMS
  1825. X#define Edit_mapwins Ed_mwin_f
  1826. X#define edit_mapwins e_mapw_bool
  1827. X#endif
  1828. END_OF_FILE
  1829. if test 713 -ne `wc -c <'starchart/starXaw.h'`; then
  1830.     echo shar: \"'starchart/starXaw.h'\" unpacked with wrong size!
  1831. fi
  1832. # end of 'starchart/starXaw.h'
  1833. fi
  1834. if test -f 'starchart/starchart_init.com' -a "${1}" != "-c" ; then 
  1835.   echo shar: Will not clobber existing file \"'starchart/starchart_init.com'\"
  1836. else
  1837. echo shar: Extracting \"'starchart/starchart_init.com'\" \(809 characters\)
  1838. sed "s/^X//" >'starchart/starchart_init.com' <<'END_OF_FILE'
  1839. X$!
  1840. X$! Define the location of the files on your system in the symbols below
  1841. X$!    by Michael Campanella (campanella@cvg.enet.dec.com)
  1842. X$!
  1843. X$!   $Header: starchart_init.com,v 1.2 90/01/12 03:00:18 ccount Exp $
  1844. X$!
  1845. X$ sao_location := sys$games:[sao]    ! change this for your system
  1846. X$!
  1847. X$ procedure = f$environment("procedure")
  1848. X$ starchart_location = f$parse(procedure,,,"device") + f$parse(procedure,,,"directory")
  1849. X$ observe_location = starchart_location - "]" + ".observe]"
  1850. X$!
  1851. X$ define/nolog starchart 'starchart_location'
  1852. X$ define/nolog sao 'sao_location'
  1853. X$!
  1854. X$ stardsp :== $'starchart_location'stardsp
  1855. X$ starpost :== $'starchart_location'starpost
  1856. X$ startek :== $'starchart_location'startek
  1857. X$ starx11 :== $'starchart_location'starx11
  1858. X$ starxaw :== $'starchart_location'starxaw
  1859. X$!
  1860. X$ observe :== $'observe_location'observe
  1861. END_OF_FILE
  1862. if test 809 -ne `wc -c <'starchart/starchart_init.com'`; then
  1863.     echo shar: \"'starchart/starchart_init.com'\" unpacked with wrong size!
  1864. fi
  1865. # end of 'starchart/starchart_init.com'
  1866. fi
  1867. if test -f 'starchart/startool.sh' -a "${1}" != "-c" ; then 
  1868.   echo shar: Will not clobber existing file \"'starchart/startool.sh'\"
  1869. else
  1870. echo shar: Extracting \"'starchart/startool.sh'\" \(49 characters\)
  1871. sed "s/^X//" >'starchart/startool.sh' <<'END_OF_FILE'
  1872. X#!/bin/sh
  1873. Xwhile true
  1874. X  do
  1875. X    starsunv -u
  1876. X  done
  1877. END_OF_FILE
  1878. if test 49 -ne `wc -c <'starchart/startool.sh'`; then
  1879.     echo shar: \"'starchart/startool.sh'\" unpacked with wrong size!
  1880. fi
  1881. # end of 'starchart/startool.sh'
  1882. fi
  1883. if test -f 'starchart/vaxcrtl.opt' -a "${1}" != "-c" ; then 
  1884.   echo shar: Will not clobber existing file \"'starchart/vaxcrtl.opt'\"
  1885. else
  1886. echo shar: Extracting \"'starchart/vaxcrtl.opt'\" \(24 characters\)
  1887. sed "s/^X//" >'starchart/vaxcrtl.opt' <<'END_OF_FILE'
  1888. Xsys$share:vaxcrtl/share
  1889. END_OF_FILE
  1890. if test 24 -ne `wc -c <'starchart/vaxcrtl.opt'`; then
  1891.     echo shar: \"'starchart/vaxcrtl.opt'\" unpacked with wrong size!
  1892. fi
  1893. # end of 'starchart/vaxcrtl.opt'
  1894. fi
  1895. if test -f 'starchart/vqgdos.s' -a "${1}" != "-c" ; then 
  1896.   echo shar: Will not clobber existing file \"'starchart/vqgdos.s'\"
  1897. else
  1898. echo shar: Extracting \"'starchart/vqgdos.s'\" \(88 characters\)
  1899. sed "s/^X//" >'starchart/vqgdos.s' <<'END_OF_FILE'
  1900. X    .globl    vqgdos_
  1901. X    .shri
  1902. Xvqgdos_:move    $-2, d0
  1903. X    trap    $2
  1904. X    cmpi    $-2, d0
  1905. X    sne    d0
  1906. X    ext    d0
  1907. X    rts
  1908. END_OF_FILE
  1909. if test 88 -ne `wc -c <'starchart/vqgdos.s'`; then
  1910.     echo shar: \"'starchart/vqgdos.s'\" unpacked with wrong size!
  1911. fi
  1912. # end of 'starchart/vqgdos.s'
  1913. fi
  1914. if test -f 'starchart/vqgdos.txt' -a "${1}" != "-c" ; then 
  1915.   echo shar: Will not clobber existing file \"'starchart/vqgdos.txt'\"
  1916. else
  1917. echo shar: Extracting \"'starchart/vqgdos.txt'\" \(67 characters\)
  1918. sed "s/^X//" >'starchart/vqgdos.txt' <<'END_OF_FILE'
  1919. XThis little assembler routine tests whether gdos is loaded or not.
  1920. END_OF_FILE
  1921. if test 67 -ne `wc -c <'starchart/vqgdos.txt'`; then
  1922.     echo shar: \"'starchart/vqgdos.txt'\" unpacked with wrong size!
  1923. fi
  1924. # end of 'starchart/vqgdos.txt'
  1925. fi
  1926. echo shar: End of archive 1 \(of 32\).
  1927. cp /dev/null ark1isdone
  1928. MISSING=""
  1929. for I in 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 ; do
  1930.     if test ! -f ark${I}isdone ; then
  1931.     MISSING="${MISSING} ${I}"
  1932.     fi
  1933. done
  1934. if test "${MISSING}" = "" ; then
  1935.     echo You have unpacked all 32 archives.
  1936.     rm -f ark[1-9]isdone ark[1-9][0-9]isdone
  1937. else
  1938.     echo You still need to unpack the following archives:
  1939.     echo "        " ${MISSING}
  1940. fi
  1941. ##  End of shell archive.
  1942. exit 0
  1943.  
  1944.